\(\int x^3 (a^2+2 a b x^3+b^2 x^6)^p \, dx\) [129]

Optimal result

Integrand size = 24, antiderivative size = 60 \[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\frac {1}{4} x^4 \left (1+\frac {b x^3}{a}\right )^{-2 p} \left (a^2+2 a b x^3+b^2 x^6\right )^p \operatorname {Hypergeometric2F1}\left (\frac {4}{3},-2 p,\frac {7}{3},-\frac {b x^3}{a}\right ) \]

[Out]

1/4*x^4*(b^2*x^6+2*a*b*x^3+a^2)^p*hypergeom([4/3, -2*p],[7/3],-b*x^3/a)/((1+b*x^3/a)^(2*p))

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 60, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.083, Rules used = {1370, 371} \[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\frac {1}{4} x^4 \left (\frac {b x^3}{a}+1\right )^{-2 p} \left (a^2+2 a b x^3+b^2 x^6\right )^p \operatorname {Hypergeometric2F1}\left (\frac {4}{3},-2 p,\frac {7}{3},-\frac {b x^3}{a}\right ) \]

[In]

Int[x^3*(a^2 + 2*a*b*x^3 + b^2*x^6)^p,x]

[Out]

(x^4*(a^2 + 2*a*b*x^3 + b^2*x^6)^p*Hypergeometric2F1[4/3, -2*p, 7/3, -((b*x^3)/a)])/(4*(1 + (b*x^3)/a)^(2*p))

Rule 371

Int[((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[a^p*((c*x)^(m + 1)/(c*(m + 1)))*Hyperg
eometric2F1[-p, (m + 1)/n, (m + 1)/n + 1, (-b)*(x^n/a)], x] /; FreeQ[{a, b, c, m, n, p}, x] &&  !IGtQ[p, 0] &&
(ILtQ[p, 0] || GtQ[a, 0])

Rule 1370

Int[((d_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_.) + (c_.)*(x_)^(n2_.))^(p_), x_Symbol] :> Dist[a^IntPart[p]*((a
+ b*x^n + c*x^(2*n))^FracPart[p]/(1 + 2*c*(x^n/b))^(2*FracPart[p])), Int[(d*x)^m*(1 + 2*c*(x^n/b))^(2*p), x],
x] /; FreeQ[{a, b, c, d, m, n, p}, x] && EqQ[n2, 2*n] && EqQ[b^2 - 4*a*c, 0] &&  !IntegerQ[2*p]

Rubi steps \begin{align*} \text {integral}& = \left (\left (1+\frac {b x^3}{a}\right )^{-2 p} \left (a^2+2 a b x^3+b^2 x^6\right )^p\right ) \int x^3 \left (1+\frac {b x^3}{a}\right )^{2 p} \, dx \\ & = \frac {1}{4} x^4 \left (1+\frac {b x^3}{a}\right )^{-2 p} \left (a^2+2 a b x^3+b^2 x^6\right )^p \, _2F_1\left (\frac {4}{3},-2 p;\frac {7}{3};-\frac {b x^3}{a}\right ) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.05 (sec) , antiderivative size = 51, normalized size of antiderivative = 0.85 \[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\frac {1}{4} x^4 \left (\left (a+b x^3\right )^2\right )^p \left (1+\frac {b x^3}{a}\right )^{-2 p} \operatorname {Hypergeometric2F1}\left (\frac {4}{3},-2 p,\frac {7}{3},-\frac {b x^3}{a}\right ) \]

[In]

Integrate[x^3*(a^2 + 2*a*b*x^3 + b^2*x^6)^p,x]

[Out]

(x^4*((a + b*x^3)^2)^p*Hypergeometric2F1[4/3, -2*p, 7/3, -((b*x^3)/a)])/(4*(1 + (b*x^3)/a)^(2*p))

Maple [F]

\[\int x^{3} \left (b^{2} x^{6}+2 a b \,x^{3}+a^{2}\right )^{p}d x\]

[In]

int(x^3*(b^2*x^6+2*a*b*x^3+a^2)^p,x)

[Out]

int(x^3*(b^2*x^6+2*a*b*x^3+a^2)^p,x)

Fricas [F]

\[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\int { {\left (b^{2} x^{6} + 2 \, a b x^{3} + a^{2}\right )}^{p} x^{3} \,d x } \]

[In]

integrate(x^3*(b^2*x^6+2*a*b*x^3+a^2)^p,x, algorithm="fricas")

[Out]

integral((b^2*x^6 + 2*a*b*x^3 + a^2)^p*x^3, x)

Sympy [F]

\[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\int x^{3} \left (\left (a + b x^{3}\right )^{2}\right )^{p}\, dx \]

[In]

integrate(x**3*(b**2*x**6+2*a*b*x**3+a**2)**p,x)

[Out]

Integral(x**3*((a + b*x**3)**2)**p, x)

Maxima [F]

\[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\int { {\left (b^{2} x^{6} + 2 \, a b x^{3} + a^{2}\right )}^{p} x^{3} \,d x } \]

[In]

integrate(x^3*(b^2*x^6+2*a*b*x^3+a^2)^p,x, algorithm="maxima")

[Out]

integrate((b^2*x^6 + 2*a*b*x^3 + a^2)^p*x^3, x)

Giac [F]

\[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\int { {\left (b^{2} x^{6} + 2 \, a b x^{3} + a^{2}\right )}^{p} x^{3} \,d x } \]

[In]

integrate(x^3*(b^2*x^6+2*a*b*x^3+a^2)^p,x, algorithm="giac")

[Out]

integrate((b^2*x^6 + 2*a*b*x^3 + a^2)^p*x^3, x)

Mupad [F(-1)]

Timed out. \[ \int x^3 \left (a^2+2 a b x^3+b^2 x^6\right )^p \, dx=\int x^3\,{\left (a^2+2\,a\,b\,x^3+b^2\,x^6\right )}^p \,d x \]

[In]

int(x^3*(a^2 + b^2*x^6 + 2*a*b*x^3)^p,x)

[Out]

int(x^3*(a^2 + b^2*x^6 + 2*a*b*x^3)^p, x)